currentpagedevice /InputAttributes get dup 0 known
	{
		0 get dup null eq {
			pop
		} {
			dup length 1 add dict copy
			dup /InputAttributes
			1 dict dup /Priority [0] put
			put setpagedevice
		} ifelse
	} {
		pop
	} ifelse